extern int hfti_(doublereal *a, integer *mda, integer *m, integer *n, doublereal *b, integer *mdb, integer *nb, doublereal *tau, integer *krank, doublereal *rnorm, doublereal *h__, doublereal *g, integer *ip);
/*:ref: diff_ 7 2 7 7 */
/*:ref: h12_ 14 11 4 4 4 4 7 4 7 7 4 4 4 */
